sum.data <- epr.final[,c("inclprop","legippop","past.conference.number.noIR","incidence_flag","mad_gdppc","p_polity2","gwf_personal","gwf_party","gwf_military","first.leader","leader.size","leader.time.in.office","leader.historical.count","timeSinceLastCoup")]

library(stargazer)
print(
stargazer(sum.data,digits=3)
)